projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ed88dbc
)
(perl-indent-line): Use `eq' to compare output of `char-after'.
author
Stefan Monnier
<monnier@iro.umontreal.ca>
Wed, 31 Oct 2001 02:42:54 +0000
(
02:42
+0000)
committer
Stefan Monnier
<monnier@iro.umontreal.ca>
Wed, 31 Oct 2001 02:42:54 +0000
(
02:42
+0000)
lisp/progmodes/perl-mode.el
patch
|
blob
|
history
diff --git
a/lisp/progmodes/perl-mode.el
b/lisp/progmodes/perl-mode.el
index c6a90cc0dd0acc7b447de7925b7f35627b435080..6e5fc1fd6eac2bcde13b2c18f036719762394d32 100644
(file)
--- a/
lisp/progmodes/perl-mode.el
+++ b/
lisp/progmodes/perl-mode.el
@@
-481,7
+481,7
@@
changed by, or (parse-state) if line starts in a quoted string."
(beginning-of-line)
(setq beg (point))
(setq shift-amt
- (cond ((
=
(char-after bof) ?=) 0)
+ (cond ((
eq
(char-after bof) ?=) 0)
((listp (setq indent (perl-calculate-indent bof))) indent)
((looking-at (or nochange perl-nochange)) 0)
(t